\name{GetSubCount}
\alias{GetSubCount}
%- Also NEED an '\alias' for EACH other topic documented here.
\encoding{UTF-8}
\title{
Gets the number of Geometry sub-objects
}
\description{
获取几何对象子对象的数目，点对象的子对象数目为1
}
\usage{
GetSubCount(obj)
}
%- maybe also 'usage' for other objects documented here.
\arguments{
  \item{obj}{
几何对象
}
}
\details{
%%  ~~ If necessary, more details than the description above ~~
}
\value{
成功返回子对象的数目，否则返回 FALSE
}
\references{
%% ~put references to the literature/web site here ~
}
\author{
%%  ~~who you are~~
}
\note{
%%  ~~further notes~~
}

%% ~Make other sections like Warning with \section{Warning }{....} ~

\seealso{
%% ~~objects to See Also as \code{\link{help}}, ~~~
}
\examples{

ps <- matrix(nrow = 15, ncol = 2)
ps[,1] <- c(10,20,20,10,10,110,120,120,110,110,110,120,120,110,110)
ps[,2] <- c(10,10,20,20,10,10,10,20,20,10,110,110,120,120,110)
geo <- CreateRegion(ps, c(5,5,5))
sub.count <- GetSubCount(geo)
sub.count

geo.pnt <- CreatePoint(10,20)
sub.count <- GetSubCount(geo.pnt)
sub.count

}
% Add one or more standard keywords, see file 'KEYWORDS' in the
% R documentation directory.
\keyword{ supermap }% use one of  RShowDoc("KEYWORDS")
